Public Class frmAccesoDirecto

    Protected Overrides Function Autorizado() As Boolean
        Return True
    End Function

    Public Property Nombre() As String
        Get
            Return txtNombre.Text
        End Get
        Set(ByVal value As String)
            txtNombre.Text = value
        End Set
    End Property

End Class